'From Pharo-1.0-10508-rc2 of 19 October 2009 [Latest update: #10508] on 14 March 2010 at 8:52:57 pm'!Object subclass: #Coseno	instanceVariableNames: 'argumento'	classVariableNames: ''	poolDictionaries: ''	category: 'TP090728'!!Coseno methodsFor: 'Accessors' stamp: 'DamianSchenkelman 3/14/2010 20:47'!parametro1: p1	"Setea el campo argumento (parametro1)."	argumento := p1	! !!Coseno methodsFor: 'Ejecucion' stamp: 'DamianSchenkelman 3/14/2010 20:49'!evaluarEn: numero	"Reemplaza la X por el parametro recibido (en caso de que la haya) y calcula el coseno del campo argumento."	|resultado tieneX|	tieneX := false.	(argumento valor = nil) ifTrue: 	[		argumento valor: numero.		tieneX := true.	].	resultado := argumento valor cos.	(tieneX) ifTrue: [argumento valor: nil].	^resultado 	! !